﻿Imports System.ComponentModel
Public Class CPoint
    Dim x As Double

    <CategoryAttribute("Position"), DescriptionAttribute("x")> Public Property XProperty() As Double
        Get
            Return x
        End Get
        Set(ByVal value As Double)
            x = value
        End Set
    End Property
    Dim y As Double
    <CategoryAttribute("Position"), DescriptionAttribute("y")> Public Property YProperty() As Double
        Get
            Return y
        End Get
        Set(ByVal value As Double)
            y = value
        End Set
    End Property




End Class
